home *** CD-ROM | disk | FTP | other *** search
- ; File: KEYPAD.TAK
- ;
- ; Bob Eager March 1991
- ;
- ; Kermit TAKE file to set up IBM enhanced keyboard to emulate a DEC
- ; VT100 or similar (e.g. VT2xx, VT3xx).
- ;
- ; The only difference on the keypad is that the VT keypad - (minus) is mapped
- ; to the F11 key on the IBM keyboard. In addition, the DO key on the LK201
- ; keyboard is mapped to the F12 key on the IBM keyboard.
- ;
- ; The LK201 key cluster is mapped not by position but by function (as far
- ; as is possible):
- ;
- ; LK201 IBM
- ; ----- ---
- ; Insert Insert
- ; Remove Delete
- ; Prev Screen Page Up
- ; Next Screen Page Down
- ; Find Home
- ; Select End
- ;
- ; The Home, End, Page Up and Page Down keys lose their normal Kermit functions
- ; because of the above. However, if SHIFT is held down when they are used, the
- ; original functions are restored.
- ;
- set display 8-bit
- ;
- ; Define keypad as near to VT100 keypad as possible (non NUMLOCKed)
- ;
- ; NUM LOCK as PF1 done by GOLD
- set key \4399 \Kpf2 ; Keypad / as PF2
- set key \311 \Kpf3 ; Keypad * as PF3
- set key \330 \Kpf4 ; Keypad - as PF4
- ;
- set key \327 \Kkp7 ; Keypad 7 as keypad 7
- set key \328 \Kkp8 ; Keypad 8 as keypad 8
- set key \329 \Kkp9 ; Keypad 9 as keypad 9
- set key \389 \Kkpminus ; F11 as keypad - (not often used)
- ;
- set key \331 \Kkp4 ; Keypad 4 as keypad 4
- set key \332 \Kkp5 ; Keypad 5 as keypad 5
- set key \333 \Kkp6 ; Keypad 6 as keypad 6
- set key \334 \Kkpcoma ; Keypad + as keypad ,
- ;
- set key \335 \Kkp1 ; Keypad 1 as keypad 1
- set key \336 \Kkp2 ; Keypad 2 as keypad 2
- set key \337 \Kkp3 ; Keypad 3 as keypad 3
- set key \4365 \Kkpenter ; Keypad Enter as keypad Enter
- ;
- set key \338 \Kkp0 ; Keypad 0 as keypad 0
- set key \339 \Kkpdot ; Keypad . as keypad .
- ;
- ; Define NUMLOCKed keypad keys to be the same as non-NUMLOCKed ones
- ;
- set key \839 \Kkp7 ; Keypad 7 as keypad 7
- set key \840 \Kkp8 ; Keypad 8 as keypad 8
- set key \841 \Kkp9 ; Keypad 9 as keypad 9
- ;
- set key \843 \Kkp4 ; Keypad 4 as keypad 4
- set key \844 \Kkp5 ; Keypad 5 as keypad 5
- set key \845 \Kkp6 ; Keypad 6 as keypad 6
- ;
- set key \847 \Kkp1 ; Keypad 1 as keypad 1
- set key \848 \Kkp2 ; Keypad 2 as keypad 2
- set key \849 \Kkp3 ; Keypad 3 as keypad 3
- ;
- set key \850 \Kkp0 ; Keypad 0 as keypad 0
- set key \851 \Kkpdot ; Keypad . as keypad .
- ;
- ; Define LK201 key cluster
- ;
- set key \4434 \KdecInsert ; Insert as Insert
- set key \4423 \KdecFind ; Home as Find
- set key \4425 \KdecPrev ; Page Up as Prev Screen
- set key \4435 \KdecRemove ; Delete as Remove
- set key \4431 \KdecSelect ; End as Select
- set key \4433 \KdecNext ; Page Down as Next Screen
- ;
- ; Define shifted key cluster keys as their original local actions
- ;
- set key \4935 \Khomscn ; Shift-Home as roll to top of memory
- set key \4937 \Kupscn ; Shift-Page Up as roll to previous screen
- set key \4943 \Kendscn ; Shift-End as roll to end of memory
- set key \4945 \Kdnscn ; Shift-Page Down as roll to next screen
- ;
- ; Define miscellaneous keys
- ;
- set key \390 \KdecDo ; F12 as DO
- ;
- ; End of file: KEYPAD.TAK
- ;
-